﻿Public Class cerrarsolicitud
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Label1.Text = Convert.ToString(seguridad.usuarioid1)
        Label2.Text = "En proceso"
        seguridad.verificapermisos()
    End Sub

   

    Protected Sub OnConfirm(ByVal sender As Object, ByVal e As EventArgs) Handles btnConfirm.Click
        Dim confirmValue As String = Request.Form("confirm_value")
        If confirmValue = "Yes" Then
            Try
                Dim tabla As New DataSet1TableAdapters.solicitudesTableAdapter

                tabla.UpdateQueryESTADO("Cerrada", ASPxGridView2.GetRowValues(ASPxGridView2.FocusedRowIndex, ("solicitudid")))
                ASPxGridView2.DataBind()
            Catch ex As Exception
                ClientScript.RegisterStartupScript(Me.[GetType](), "alert", "alert('No se pudo procesar su solicitud, contactese con el administrador')", True)
            End Try

        Else
            Dim jj As Integer = 0
            '  ClientScript.RegisterStartupScript(Me.[GetType](), "alert", "alert('You clicked NO!')", True)
        End If
    End Sub


End Class